<script>on mouseUpglobal sltLineput word 2 of the clickline into sltLineput 301 into xput 55+16*sltLine into yset the rect of cd fld "arrow" to x,y,x+24,y+21show cd fld "arrow"if sltLine > 8thenset the rect of cd fld "テウjテャヒ冪op" to x+25,201,x+76,331elseset the rect of cd fld "テウjテャヒ冪op" to x+25,y+2,x+76,y+132end ifshow cd fld "テウjテャヒ冪op"end mouseUp357,72,405,189</script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>40</left>
<top>74</top>
<right>280</right>
<bottom>333</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テャ窶。テウe</name>
<script></script>
</part>
<part>
<id>4</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>0</left>
<top>54</top>
<right>406</right>
<bottom>73</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>7</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>432</left>
<top>286</top>
<right>512</right>
<bottom>330</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>7024</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>テ韻テ悦テ嘉ャテ曳テï」ソテァテ古ィテコテ竏妥テ</name>
<script>on mouseUpask "テ「ホゥテァsテïャづテε韻テ悦テ嘉ャテ曳テï」ソテァテ古ィテコテツオテ窶ケテ竏妥ツゥテ⑨" with 1if the result is "cancel" then exit mouseUpput it into nput line n of cd fld "テウjテャヒ" into YOBIput line n of cd fld "テャ窶。テウe" into EVENTput YOBI & "テウjテャヒ凖テε w" & EVENT & "テ xテï」ソテァテ古ィテコテツオテ窶ケテ竏" into delMsganswer delMsg with "テ鵜テ嘉嘉嘉ャテ瓜テ嘉」" or "OK"if it is "テ鵜テ嘉嘉嘉ャテ瓜テ嘉」" then exit mouseUpdelete line n of cd fld "テャ窶。テウe"delete line n of cd fld "テウjテャヒ"delete line n of cd fld "テ「ホゥテゥテサ"delete line n of cd fld "テ「ホゥテッ邃「"end mouseUp</script>
</part>
<part>
<id>8</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>6</left>
<top>74</top>
<right>36</right>
<bottom>333</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テ・テゥ</name>
<script></script>
</part>
<part>
<id>11</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>301</left>
<top>103</top>
<right>325</right>
<bottom>124</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>arrow</name>
<script></script>
</part>
<part>
<id>12</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>329</left>
<top>74</top>
<right>363</right>
<bottom>333</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テ「ホゥテゥテサ</name>
<script></script>
</part>
<part>
<id>14</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>361</left>
<top>74</top>
<right>395</right>
<bottom>333</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テ「ホゥテッ邃「</name>
<script></script>
</part>
<part>
<id>9</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <true /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>326</left>
<top>105</top>
<right>377</right>
<bottom>235</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テウjテャヒ冪op</name>
<script>on mouseUpglobal sltLineselect the clicklineput the selection into line sltLine of cd fld "テウjテャヒ"hide mehide cd fld "arrow"end mouseUp</script>
<script>on mouseUpglobal sltLineput word 2 of the clickline into sltLineput 260 into xput 55+16*sltLine into yset the rect of cd fld "arrow" to x,y,x+24,y+21show cd fld "arrow"if sltLine > 10thenset the rect of cd fld "テォテ甘「ホゥpop" to x+23,233,x+71,329elseset the rect of cd fld "テォテ甘「ホゥpop" to x+23,y+2,x+71,y+98end ifhide cd fld "テウjテャヒ冪op"show cd fld "テォテ甘「ホゥpop"end mouseUp</script>
</part>
<part>
<id>2</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>282</left>
<top>74</top>
<right>326</right>
<bottom>333</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テウjテャヒ</name>
<script>on mouseUpglobal sltLineput word 2 of the clickline into sltLineput 301 into xput 55+16*sltLine into yset the rect of cd fld "arrow" to x,y,x+24,y+21show cd fld "arrow"if sltLine > 8thenset the rect of cd fld "テウjテャヒ冪op" to x+25,201,x+76,331elseset the rect of cd fld "テウjテャヒ冪op" to x+25,y+2,x+76,y+132end ifhide cd fld "テォテ甘「ホゥpop"show cd fld "テウjテャヒ冪op"end mouseUp357,72,405,189</script>
</part>
<part>
<id>3</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <true /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>36</left>
<top>74</top>
<right>242</right>
<bottom>333</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テャ窶。テウe</name>
<script></script>
</part>
<part>
<id>4</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>0</left>
<top>54</top>
<right>478</right>
<bottom>73</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name></name>
<script></script>
</part>
<part>
<id>5</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <false /> </lockText>
<rect>
<left>397</left>
<top>74</top>
<right>431</right>
<bottom>333</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テウ¥テァテェ</name>
<script></script>
</part>
<part>
<id>7</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>432</left>
<top>286</top>
<right>512</right>
<bottom>330</bottom>
</rect>
<style>transparent</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>7024</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>テ韻テ悦テ嘉ャテ曳テï」ソテァテ古ィテコテ竏妥テ</name>
<script>on mouseUpask "テ「ホゥテァsテïャづテε韻テ悦テ嘉ャテ曳テï」ソテァテ古ィテコテツオテ窶ケテ竏妥ツゥテ⑨" with 1if the result is "cancel" then exit mouseUpput it into nput line n of cd fld "テォテ甘「ホゥ" into DAIXput line n of cd fld "テウjテャヒ" into YOBIput line n of cd fld "テャ窶。テウe" into EVENTput "テォテ" & DAIX & YOBI & "テウjテャヒ凖テε w" & EVENT & "テ xテï」ソテァテ古ィテコテツオテ窶ケテ竏" into delMsganswer delMsg with "テ鵜テ嘉嘉嘉ャテ瓜テ嘉」" or "OK"if it is "テ鵜テ嘉嘉嘉ャテ瓜テ嘉」" then exit mouseUpdelete line n of cd fld "テャ窶。テウe"delete line n of cd fld "テォテ甘「ホゥ"delete line n of cd fld "テウjテャヒ"delete line n of cd fld "テァツーテ・テゥテテεャヒ"delete line n of cd fld "テウテ テ・テゥテテεャヒ"delete line n of cd fld "テウ¥テァテェ"end mouseUp</script>
</part>
<part>
<id>8</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>6</left>
<top>74</top>
<right>36</right>
<bottom>333</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テ・テゥ</name>
<script></script>
</part>
<part>
<id>10</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <true /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>283</left>
<top>153</top>
<right>331</right>
<bottom>249</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テォテ甘「ホゥpop</name>
<script>on mouseUpglobal sltLineselect the clicklineput the selection into line sltLine of cd fld "テォテ甘「ホゥ"hide mehide cd fld "arrow"end mouseUp</script>
</part>
<part>
<id>11</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>260</left>
<top>151</top>
<right>284</right>
<bottom>172</bottom>
</rect>
<style>transparent</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>arrow</name>
<script></script>
</part>
<part>
<id>12</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>329</left>
<top>74</top>
<right>363</right>
<bottom>333</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テァツーテ・テゥテテεャヒ</name>
<script></script>
</part>
<part>
<id>13</id>
<type>button</type>
<visible> <true /> </visible>
<reserved5> 0 </reserved5>
<reserved4> 0 </reserved4>
<reserved3> 0 </reserved3>
<reserved2> 0 </reserved2>
<reserved1> 0 </reserved1>
<enabled> <true /> </enabled>
<rect>
<left>436</left>
<top>224</top>
<right>508</right>
<bottom>270</bottom>
</rect>
<style>roundrect</style>
<showName> <true /> </showName>
<highlight> <false /> </highlight>
<autoHighlight> <true /> </autoHighlight>
<sharedHighlight> <true /> </sharedHighlight>
<family>0</family>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>center</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<name>テャヒ凖ッtテï」ソテ・vテゥZ</name>
<script>on mouseUpput the date into KYOUconvert KYOU to dateItemsput item 1 of KYOU into NENput item 2 of KYOU into TUKIputDayToDate NEN,TUKIend mouseUp</script>
</part>
<part>
<id>14</id>
<type>field</type>
<visible> <true /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <false /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <true /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>361</left>
<top>74</top>
<right>395</right>
<bottom>333</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <true /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>right</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テウテ テ・テゥテテεャヒ</name>
<script></script>
</part>
<part>
<id>9</id>
<type>field</type>
<visible> <false /> </visible>
<dontWrap> <false /> </dontWrap>
<dontSearch> <true /> </dontSearch>
<sharedText> <false /> </sharedText>
<fixedLineHeight> <false /> </fixedLineHeight>
<autoTab> <false /> </autoTab>
<lockText> <true /> </lockText>
<rect>
<left>326</left>
<top>153</top>
<right>377</right>
<bottom>283</bottom>
</rect>
<style>shadow</style>
<autoSelect> <false /> </autoSelect>
<showLines> <false /> </showLines>
<wideMargins> <false /> </wideMargins>
<multipleLines> <false /> </multipleLines>
<reservedFamily> 0 </reservedFamily>
<titleWidth>0</titleWidth>
<icon>0</icon>
<textAlign>left</textAlign>
<font>Osaka</font>
<textSize>12</textSize>
<textStyle>plain</textStyle>
<textHeight>16</textHeight>
<name>テウjテャヒ冪op</name>
<script>on mouseUpglobal sltLineselect the clicklineput the selection into line sltLine of cd fld "テウjテャヒ"hide mehide cd fld "arrow"end mouseUp</script>
<script>on mouseUpask "テ「ホゥテァsテïャづテε韻テ悦テ嘉ャテ曳テï」ソテァテ古ィテコテツオテ窶ケテ竏妥ツゥテ⑨" with 1if the result is "cancel" then exit mouseUpput it into nput line n of cd fld "テ・テゥ" into TUKIput line n of cd fld "テャヒ" into HIput line n of cd fld "テャ窶。テウe" into EVENT-- put line n of cd fld "テウ¥テァテェ" into YOKOKUput TUKI & "/" & HI & " テテε w" & EVENT & "テ xテï」ソテァテ古ィテコテツオテ窶ケテ竏" into delMsganswer delMsg with "テ鵜テ嘉嘉嘉ャテ瓜テ嘉」" or "OK"if it is "テ鵜テ嘉嘉嘉ャテ瓜テ嘉」" then exit mouseUpdelete line n of cd fld "テョN"delete line n of cd fld "テ・テゥ"delete line n of cd fld "テャヒ"delete line n of cd fld "テャ窶。テウe"delete line n of cd fld "テウ¥テァテェ"end mouseUp</script>
<script>on mouseUplock screenif the optionKey is downthenput date() into KYOUconvert KYOU to dateitemsput "0,0,0" into HYOUJIput item 1 of KYOU into item 1 of HYOUJIput item 2 of KYOU into item 2 of HYOUJIput item 3 of KYOU into item 3 of HYOUJIask "テ「ホゥテ・テゥテ「ホゥテャヒ凖窶ヲテ 竅テャテテツオテ窶ケテ竏妥ツゥテ⑨" with HYOUJIif the result is "cancel" then exit mouseUpput it into HYOUJIput item 1 of HYOUJI into item 1 of KYOUput item 2 of HYOUJI into item 2 of KYOUput item 3 of HYOUJI into item 3 of KYOUconvert KYOU to dateitemsgoTotheday(KYOU)unlock screen with visual effect shrink to center very fastelsegoBackTodayunlock screen with visual effect shrink to center very fastend ifend mouseUp</script>